home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmstanc / _setup.1 / AHMTFontControls.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-12-05  |  6.7 KB  |  218 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTFontControls.pas' rev: 3.00
  6.  
  7. #ifndef AHMTFontControlsHPP
  8. #define AHMTFontControlsHPP
  9. #include <Menus.hpp>
  10. #include <Forms.hpp>
  11. #include <AHMSControls.hpp>
  12. #include <StdCtrls.hpp>
  13. #include <Controls.hpp>
  14. #include <Graphics.hpp>
  15. #include <Classes.hpp>
  16. #include <Messages.hpp>
  17. #include <Windows.hpp>
  18. #include <SysInit.hpp>
  19. #include <System.hpp>
  20.  
  21. //-- user supplied -----------------------------------------------------------
  22.  
  23. namespace Ahmtfontcontrols
  24. {
  25. //-- type declarations -------------------------------------------------------
  26. enum TAHMFontTypes { PS, TTF, RASTER, Other };
  27.  
  28. class DELPHICLASS TAHMFontClass;
  29. class PASCALIMPLEMENTATION TAHMFontClass : public System::TObject 
  30. {
  31.     typedef System::TObject inherited;
  32.     
  33. public:
  34.     System::AnsiString CFontName;
  35.     TAHMFontTypes CFontType;
  36. public:
  37.     /* TObject.Create */ __fastcall TAHMFontClass(void) : System::TObject() { }
  38.     /* TObject.Destroy */ __fastcall virtual ~TAHMFontClass(void) { }
  39.     
  40. };
  41.  
  42. class DELPHICLASS TAHMFontList;
  43. class PASCALIMPLEMENTATION TAHMFontList : public Classes::TStringList 
  44. {
  45.     typedef Classes::TStringList inherited;
  46.     
  47. __published:
  48.     __fastcall virtual ~TAHMFontList(void);
  49. public:
  50.     /* TObject.Create */ __fastcall TAHMFontList(void) : Classes::TStringList() { }
  51.     
  52. };
  53.  
  54. typedef Graphics::TBitmap* TAHMFontBits[4];
  55.  
  56. enum TAHMFilterOption { ShowTrueType, ShowPostScript, ShowRaster, ShowOther };
  57.  
  58. typedef Set<TAHMFilterOption, ShowTrueType, ShowOther>  TAHMFilterOptions;
  59.  
  60. typedef void __fastcall (__closure *TAHMOnFontValidate)(System::TObject* Sender, TAHMFontClass* Font
  61.     , bool &accept);
  62.  
  63. class DELPHICLASS TAHMFontBox;
  64. class PASCALIMPLEMENTATION TAHMFontBox : public Stdctrls::TCustomListBox 
  65. {
  66.     typedef Stdctrls::TCustomListBox inherited;
  67.     
  68. private:
  69.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  70.     TAHMFilterOptions FFilterOptions;
  71.     TAHMFontList* FontStringList;
  72.     TAHMOnFontValidate FOnValidateFont;
  73.     Graphics::TBitmap* FBitmaps[4];
  74.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
  75.     System::AnsiString __fastcall GetFontSelected(void);
  76.     void __fastcall SetFontSelected(System::AnsiString Value);
  77.     
  78. protected:
  79.     virtual void __fastcall CreateWnd(void);
  80.     void __fastcall SeTAHMFilterOptions(TAHMFilterOptions Value);
  81.     
  82. public:
  83.     __fastcall virtual TAHMFontBox(Classes::TComponent* AOwner);
  84.     __fastcall virtual ~TAHMFontBox(void);
  85.     virtual void __fastcall DrawItem(int Index, const Windows::TRect &Rect, Stdctrls::TOwnerDrawState State
  86.         );
  87.     void __fastcall ReBuild(void);
  88.     
  89. __published:
  90.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  91.     __property Align ;
  92.     __property BorderStyle ;
  93.     __property Color ;
  94.     __property Ctl3D ;
  95.     __property DragCursor ;
  96.     __property DragMode ;
  97.     __property Enabled ;
  98.     __property ExtendedSelect ;
  99.     __property TAHMFilterOptions FilterOptions = {read=FFilterOptions, write=SeTAHMFilterOptions, default=15
  100.         };
  101.     __property Font ;
  102.     __property IntegralHeight ;
  103.     __property ItemHeight ;
  104.     __property MultiSelect ;
  105.     __property ParentColor ;
  106.     __property ParentCtl3D ;
  107.     __property ParentFont ;
  108.     __property ParentShowHint ;
  109.     __property PopupMenu ;
  110.     __property ShowHint ;
  111.     __property TabOrder ;
  112.     __property TabWidth ;
  113.     __property Visible ;
  114.     __property TAHMOnFontValidate OnValidateFont = {read=FOnValidateFont, write=FOnValidateFont};
  115.     __property OnClick ;
  116.     __property OnDblClick ;
  117.     __property OnDragDrop ;
  118.     __property OnDragOver ;
  119.     __property OnDrawItem ;
  120.     __property OnEndDrag ;
  121.     __property OnEnter ;
  122.     __property OnExit ;
  123.     __property OnKeyDown ;
  124.     __property OnKeyPress ;
  125.     __property OnKeyUp ;
  126.     __property OnMeasureItem ;
  127.     __property OnMouseDown ;
  128.     __property OnMouseMove ;
  129.     __property OnMouseUp ;
  130.     __property OnStartDrag ;
  131.     __property System::AnsiString FontSelected = {read=GetFontSelected, write=SetFontSelected};
  132. public:
  133.     /* TWinControl.CreateParented */ __fastcall TAHMFontBox(HWND ParentWindow) : Stdctrls::TCustomListBox(
  134.         ParentWindow) { }
  135.     
  136. };
  137.  
  138. class DELPHICLASS TAHMFontCombo;
  139. class PASCALIMPLEMENTATION TAHMFontCombo : public Stdctrls::TCustomComboBox 
  140. {
  141.     typedef Stdctrls::TCustomComboBox inherited;
  142.     
  143. private:
  144.     TAHMFilterOptions FFilterOptions;
  145.     TAHMFontList* FontStringList;
  146.     TAHMOnFontValidate FOnValidateFont;
  147.     Graphics::TBitmap* FBitmaps[4];
  148.     Ahmscontrols::TAHMAboutSControlStr FAboutStr;
  149.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
  150.     
  151. protected:
  152.     virtual void __fastcall CreateWnd(void);
  153.     void __fastcall SeTAHMFilterOptions(TAHMFilterOptions Value);
  154.     System::AnsiString __fastcall GetFontSelected(void);
  155.     void __fastcall SetFontSelected(System::AnsiString Value);
  156.     
  157. public:
  158.     __fastcall virtual TAHMFontCombo(Classes::TComponent* AOwner);
  159.     __fastcall virtual ~TAHMFontCombo(void);
  160.     virtual void __fastcall DrawItem(int Index, const Windows::TRect &Rect, Stdctrls::TOwnerDrawState State
  161.         );
  162.     void __fastcall ReBuild(void);
  163.     
  164. __published:
  165.     __property Ahmscontrols::TAHMAboutSControlStr About = {read=FAboutStr, write=FAboutStr};
  166.     __property Align ;
  167.     __property Color ;
  168.     __property Ctl3D ;
  169.     __property DragMode ;
  170.     __property DragCursor ;
  171.     __property DropDownCount ;
  172.     __property Enabled ;
  173.     __property TAHMFilterOptions FilterOptions = {read=FFilterOptions, write=SeTAHMFilterOptions, default=15
  174.         };
  175.     __property Font ;
  176.     __property MaxLength ;
  177.     __property ParentColor ;
  178.     __property ParentCtl3D ;
  179.     __property ParentFont ;
  180.     __property ParentShowHint ;
  181.     __property PopupMenu ;
  182.     __property ShowHint ;
  183.     __property TabOrder ;
  184.     __property TabStop ;
  185.     __property Text ;
  186.     __property Visible ;
  187.     __property TAHMOnFontValidate OnValidateFont = {read=FOnValidateFont, write=FOnValidateFont};
  188.     __property OnChange ;
  189.     __property OnClick ;
  190.     __property OnDblClick ;
  191.     __property OnDragDrop ;
  192.     __property OnDragOver ;
  193.     __property OnDrawItem ;
  194.     __property OnDropDown ;
  195.     __property OnEndDrag ;
  196.     __property OnEnter ;
  197.     __property OnExit ;
  198.     __property OnKeyDown ;
  199.     __property OnKeyPress ;
  200.     __property OnKeyUp ;
  201.     __property OnMeasureItem ;
  202.     __property OnStartDrag ;
  203.     __property System::AnsiString FontSelected = {read=GetFontSelected, write=SetFontSelected};
  204. public:
  205.     /* TWinControl.CreateParented */ __fastcall TAHMFontCombo(HWND ParentWindow) : Stdctrls::TCustomComboBox(
  206.         ParentWindow) { }
  207.     
  208. };
  209.  
  210. //-- var, const, procedure ---------------------------------------------------
  211.  
  212. }    /* namespace Ahmtfontcontrols */
  213. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  214. using namespace Ahmtfontcontrols;
  215. #endif
  216. //-- end unit ----------------------------------------------------------------
  217. #endif    // AHMTFontControls
  218.